Открывает указанный файл и возвращает объект TextStream для проведения различных операций чтения или записи.

object.OpenTextFile(filename[, iomode[, create[, format]]])

Параметры
object Обязательный. Всегда имя объекта FileSystemObject
fileName Обязательный. Путь и имя создаваемого файла. Если путь опущен, то файл ищется в текущем каталоге текущего диска
iomode Необязательный. Константа, определяющая режим открытия файла. По умолчанию ForReading
create Необязательный. Флаг, определяющий, должен ли создаваться новый файл, если FileName не существует. По умолчанию False-не должен
format Необязательный. Одно из троичных значений, определяющий кодировку. По умолчанию ASCII
Константы режима открытия файла

Константы 	Значение 		Описание 
ForReading 	1 		Только для чтения 
ForWriting 	2 		Открытие файла для записи(содержимое файла уничтожается) 
ForAppending 	8 		Открытие файла и запись в конец файла 

Константы кодировки для Format

Константы 		Значение 			Описание 
TristateUseDefault 	-2 			Открытие файла с кодировкой, заданной системой по умолчанию 
TristateTrue 		-1 			Открытие в кодировке Unicode 
TristateFalse 		 0 			Открытие в кодировке ASCII 

Пример
Следующий код иллюстрирует использование OpenTextFile метод для открытия файла и добавдения текста:

Sub OpenTextFileTest
    Const ForReading = 1, ForWriting = 2, ForAppending = 3
    Dim fs, f
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,TristateFalse)
    f.Write "Hello world!"
    f.Close
End Sub